home *** CD-ROM | disk | FTP | other *** search
/ Eros - Digital Erotica & Games / Eros - Digital Erotica & Games.iso / mac / EROS vol.1 / EROS vol.DXR / 00024.ls < prev    next >
Encoding:
Text File  |  1995-07-07  |  1.2 KB  |  39 lines
  1. on exitFrame
  2.   global r
  3.   go(marker(0) + 5)
  4.   if r < 2 then
  5.     set r to r + 1
  6.     if r = 2 then
  7.       set the locH of sprite 4 to the locH of sprite 27
  8.       set the locV of sprite 4 to the locV of sprite 27
  9.       set the locH of sprite 5 to the locH of sprite 28
  10.       set the locV of sprite 5 to the locV of sprite 28
  11.       set the locH of sprite 6 to the locH of sprite 29
  12.       set the locV of sprite 6 to the locV of sprite 29
  13.       puppetSprite(18, 1)
  14.       cursor(0)
  15.     end if
  16.   end if
  17.   movWatch()
  18.   if rollOver(27) then
  19.     set the castNum of sprite 18 to the number of cast "an"
  20.     set the locV of sprite 18 to the locV of sprite 14
  21.     set the locH of sprite 18 to the locH of sprite 14
  22.     exit
  23.   end if
  24.   if rollOver(28) then
  25.     set the castNum of sprite 18 to the number of cast "sw"
  26.     set the locV of sprite 18 to the locV of sprite 15
  27.     set the locH of sprite 18 to the locH of sprite 15
  28.     exit
  29.   end if
  30.   if rollOver(29) then
  31.     set the castNum of sprite 18 to the number of cast "ID"
  32.     set the locV of sprite 18 to the locV of sprite 16
  33.     set the locH of sprite 18 to the locH of sprite 16
  34.     exit
  35.   end if
  36.   set the locV of sprite 18 to -200
  37.   Navi()
  38. end
  39.